home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 2 / Tech Arsenal 2 (Arsenal Computer).iso / lan_nov / l11g01.exe / INT17FIX.PAT < prev    next >
Encoding:
Text File  |  1994-02-14  |  1.1 KB  |  31 lines
  1. TARGET=CLIENT.EXE
  2. LIST
  3.     print "INT17FIX.PAT - NetWare Lite Client int 17 ISR patch, German version.\n"
  4. VERIFY
  5.     va = search ( E8 54 E6 B4 90 80 7F 32 3C 72
  6.                   DA checksum 61F )
  7.     vc = search ( 50 E8 B7 19 58 C3 checksum 323 )
  8.     if ((va=1C06) AND (vc=25D) ) then
  9.         print "  $TARGET already contains patch INT17FIX.PAT.\n"
  10.         stop
  11.     else
  12.         print "  $TARGET does not contain patch INT17FIX.PAT.\n"
  13.     endif
  14. APPLY
  15.     print "  Applying patch INT17FIX.PAT to $TARGET...\n"
  16.     vb = search ( E8 0F 00 B4 90 80 7F 32 3C 72
  17.                   DA checksum 4F4 )
  18.     if (vb=1C06) then
  19.         patch 1C07 ( 54 E6 checksum 13A )
  20.         patch  25D ( 50 E8 B7 19 58 C3 checksum 323 )
  21.         write
  22.         print "  $TARGET now contains patch INT17FIX.PAT.\n"
  23.         stop
  24.     else
  25.         print "  Could not find pattern indicating that $TARGET\n"
  26.         print "  needs this patch.  Make sure you are using this\n"
  27.         print "  patch with NetWare Lite CLIENT.EXE, German version 1.1.\n"
  28.         stop
  29.     endif
  30.  
  31.